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I.  INTRODUCTION 


Since  its  inception  in  the  early  1960s,  MIL-STD-461  and  its  associated 
notes  have  been  one  of  the  primary  standards  for  evaluating  the  electromagnetic 
compatability  of  military  electrical  and  electronic  equipment.  The  standard, 
and  its  associated  standard  (MIL-STD-462)  outline  applicable  limits  and  test 
procedures  to  minimize  electromagnetic  interference  (EMI)  between  systems  and 
components. 

These  two  standards  require  conducted  and  radiated  emissions  and 
susceptability  tests  in  a  number  of  frequency  bands  from  30  Hz  to  1.5  GHz  (the 
tests  required  for  emissions  are  shown  in  figure  1).  These  tests  require  a 
large  number  of  instrument  parameter  and  frequency  effect  corrections  due  to 
the  wide  frequency  bands  over  which  they  are  run.  This  requirement  (repetative 
type  tests  with  large  numbers  of  calculated  corrections)  indicated  that  an 
automated  test  system  would  significantly  reduce  the  time  required  to  run  the 
test. 


CONDUCTED  EMISSIONS  TESTS 
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Figure  1.  Emissions  tests  required  by  MIL-STD-461. 
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The  automatic  test  system  which  we  developed  is  based  on  an  HT>9825 
computing  controller  and  an  HP8568A  spectrum  analyzer.  This  equipment  was 
chosen  for  the  following  reasons: 

1)  The  9825  calculator  system  had  been  purchased  previously  and  was 
available  for  use. 

2)  The  requirements  of  interfacing  the  controller  and  spectrum 
analyzer  are  simplified  using  the  HPIB.  (Since  the  8568A  presents 
digitally  processed  data  in  stand-alone  mode  anyway,  the  A  to  D  and 
D  to  A  conversion  was  designed  into  the  machine,  not  the  HPIB 
interface. ) 

3)  Since  the  8568A  spectrum  analyzer  functions  are  fully  programmable 
from  100  Hz  to  1.5  GHz,  we  needed  to  buy  only  one  unit,  rather  than 
the  three  EMI  receivers  needed  to  run  the  same  test,  and  operator 
intervention  during  the  test  was  eliminated. 

The  actual  equipment  used  in  the  test  is  listed  in  Appendix  D.  The 
optional  equipment  was  used  since  we  already  had  it,  but  only  the  antennas, 
plotter,  spectrum  analyzer  and  controller  are  necessary  for  running  the  test. 

The  algorithm  used  for  acquiring  and  processing  the  data  is  a  simple  one 
consisting  of  the  following  steps: 

1)  Acquire  the  data. 

2)  Add  the  antenna  correction  factor. 

3)  Add  the  impulse  bandwidth  correction  factor  for  broadband  data. 

4)  Plot  the  data. 

Further  information  concerning  the  program  can  be  found  in  the  program 
description  section  which  follows. 

The  program  outlined  in  the  program  listing  has  been  run  and  checked 
against  industry  standard  instrumentation  (Singer  EMI  receivers)  and 
calibrated  impulse  sources.  The  errors  noted  in  these  two  comparisons  have 
been  limited  to  the  tolerances  of  the  receivers  (less  than  3  dB) .  (NOTE: 

This  correlation  assumes  the  EMI  receivers  are  in  peak  mode.)  Due  to  duty 
cycle  effects.  Singer  average  mode  readings  of  signals  will  be  significantly 
different  from  the  8568A  readings  for  non-CW  signals  or  non-50Z  duty  cycle 
pulses . ) 

II.  PROGRAM  DESCRIPTION 

As  can  be  seen  from  the  program  listing  and  flow  diagram  (figure  2),  this 
program  is  divided  into  two  sections.  The  first  one  (lines  0  to  30)  is  a  loop 
which  controls  the  program  flow  by  calling  appropriate  subroutines.  This 
section  also  initializes  the  computational  and  data  acquisition  equipment. 
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Figure  2 


RE02  and  2.1  program  flow 


The  second  section  (lines  31  to  378)  contain  the  subroutine-  called  by 
the  control  section. 

Each  of  the  subroutines  will  be  explained  in  detail  in  the  following 
sections,  but  some  words  of  clarification  are  needed  concerning  the  control 
section: 

Line  3  -  clears  the  HPIB  interface 

Line  9  -  initializes  the  loop  counter  (rl) .  The  number  of  times 
the  loop  is  executed  depends  on  the  number  of  intervals 
into  which  the  spectrum  to  be  surveyed  must  be  divided  to 
prevent  the  appearance  of  the  spectrum  analyzer  local 
oscillator  skirts  in  the  data. 

Line  10  -  initializes  string  variable  A$  which  sets  the  broadband/ 
narrowband  mode  (impulse  bandwidth  correction  factors  are 
not  used  during  analysis  of  narrowband  data) .  Note  that  the 
branch  to  BCOR,  the  impulse  bandwidth  correction  subroutine, 
is  only  taken  when  broadband  mode  is  set. 

Line  23  -  sets  the  narrowband  mode  at  the  end  of  the  broadband 
measurement  for  each  frequency  band. 

Line  24  -  loop  back  to  the  start  of  the  measurement  routines  so  that 
the  narrowband  data  collection  can  begin. 

Line  26  -  checks  the  loop  counter  (rl)  to  see  if  all  measurement 

bands  have  been  completed,  looping  back  to  line  10  if  they 
have  not. 

Line  27  -  stores  the  plotter  pen. 

0:  "  MIL  SPEC  161  TEOT  PROGRAM" : 

1  ”  GCCTION  RE02  (RADIATED  EMISSIONS)  "  : 

2 :  asb  "DEV" 

3:  cli  7 
4:  q„b  "PI.TNIT " 

5:  gsb  “ARRAY" 

6:  gob  "arat" 

7:  geb  "TITLF1 " 

8:  gsb  “title -out" 

9 :  1  ->r  1 
10:  "BB  "->Af 
11:  gsb  "ANT" 

12;  asb  "SETUr" 

13:  gsb  "FREQ" 

14:  asb  "BMP" 

15:  ash  "SWEEP" 

16:  gsb  "REDRt  " 

17:  gsb  "REDSA" 

18:  gsb  "chop" 

19:  if  A*="DP"-asb  " -Booth* 

20:  if  A*~"BBM  jqsb  "BCOR" 
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21 


27 


21 

25 

26 

27 

28 
29 


qsb  "ANTCOK " 
if  A*="NB"}q1o  +3 
"NB”  >A$ 
a  1 0  “12 
l+rl->r1 

if  r 1 <7 jqt o  -16 
pen# 

dsp  "FND  OF  TEST*1; beep  tend 


III.  SUBROUTINE  DESCRIPTIONS 


A.  DEV 

Subroutine  DEV  uses  the  HPL  device  statement  (dev)  to  associate 
string  variables  with  peripheral  logical  unit  numbers  (HPIB  addresses) .  Line 
33  makes  the  following  assignments: 


device 

name 

HPIB  ad  dr 

HP8568  Spectrum  Analyzer 

sa 

718 

HP9866B  Line  Printer 

IP 

6 

HP9872A  Plotter 

gr 

705 

HP9825  Controller 

25 

719 

HP2631A  Line  Printer 

ptr 

714 

The  main  reason  for  using  the  device  statement  is  to  facilitate  program 
modification  if  the  HPIB  device  address  assignments  must  be  changed.  If 
peripheral  devices  were  referenced  directly  by  address,  changing  an  HPIB 
address  would  mean  modifying  every  statement  which  referenced  that  peripheral. 

By  using  the  device  statement  this  situation  is  averted,  and  only  the  device 
statement  making  the  assignment  must  be  changed  if  HPIB  addresses  are  changed. 

30:  "x**»»*w»**#*****##*#  SUBROUTINES  *************************** " : 
31  : 

32:  "DEM  ASSIGNS  THE  HPIB  ADDRESSES": 

33:  "DEV" : dev  "sa",718, "Ip" ,6, "qr " ,705, "25" ,719, "ptr " ,714 j ret 
■xa . 

B.  ARRAY 

Array  dimensions  the  necessary  storage  arrays  for  the  real  and  string 
variables.  The  HPL  dim  statement  is  equivalent  to  the  FORTRAN  DIMENSION 
statement . 

There  is  one  difference,  however.  In  HPL  the  string  variables  must  be 
dimensioned.  The  statement  dim  A$[x,y]  dimensions  an  array  of  x  number  of 
string  variables,  each  of  which  is  y  characters  long,  assigned  to  string 
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array  A$.  The  statement  dim  A$[x],  dimensions  a^  string  variable ,  -  characters 
long  to  be  named  A$. 

35:  “ARRAY": 

36:  "ARRAY  DIMENSIONS  ALL  ARP AYS" : 

37;  t)  Lfi  KtlOOl  >011001  ,1.110011  .  AT  1 2  .1  IT:  I  64  1  .D* I  0,641 

33;  ret 

39: 

C.  PLINIT 

This  routine  initializes  (clears)  the  9872A  Graphics  Plotter  ^nd  set's 
the  plotting  window  scale  points  PI  and  P2.  It  also  sets  the  minimum  and 
maximum  scale  values  in  user  units. 

"PLINIT" : 

"INITIL1ZES  THE  PLOTTER  AND  SITS  THE  VALUE  OP  PI  L  P ?. "  : 
wrt  "gr " , "IN" 

wrt  ”ar  '* ,  "IP  100,1000.13000,8000" 
sc  I  -i  00,  2300,  -60,100 
ret 

D.  GRAT 

The  purpose  of  this  subroutine  is  to  draw  and  label  two  semi-log 
plots  (one  broadband  and  one  narrowband)  on  which  the  final  data  will  be 
plotted.  Variable  Z  contains  an  X  offset  (1200  for  narrowband,  0  for  broad¬ 
band)  used  to  distinguish  between  the  plot  positions  for  both  drawing  the 
graticles  and  plotting  the  data. 

Lines  200  through  209  draw  vertical  logrithmatic  lines  representing  the 
frequencies  of  the  points  to  be  plotted.  This  requires  a  translation  of  the 
linear  x  coordinate  to  a  log  scale.  The  translation  is  accomplished  by  the 
following  algorithm: 

1.  The  points  (0,0)  and  (amp-min,  freq  min)  are  placed  at  the  same 
point  mathematically.  The  x  origin  translation  is  accomplished  by  calculating 
an  offset  function: 

<(>  »  log  f  min  -  offset,  or 

log  f  min  =  offset. 

2.  Since  the  frequency  range  shown  in  the  plot  is  1000  plotter  units 
wide,  the  number  of  points  per  integer  log  units  is: 

n  ■  1000/ (log  F  stop  -  log  f  start). 

3.  Using  the  relationships  above,  the  x  coordinate  (frequency)  of 
any  point  may  be  calculated  by: 

x  =  n  (log  f  -  offset). 


156 

157 

158 

159 

160 
161 
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4.  The  amplitude  (y  coordinate)  may  be  represented  in  a  linear  mode 
and  in  this  subroutine  the  offsets  are  automatically  calculated  in  the  scl 
statement  contained  in  PLINIT. 

This  algorithm  is  also  used  to  calculate  the  points  being  plotted  in  the 
plotting  portion  of  ANTCOR. 


Lines  211  through  218  plot  the  eleven  horizontal  lines  representing  the 
linear  dBuV  scale  (vertical  coordinate  lines).  Lines  222  through  263  label  the 
axes  of  the  graph.  Lines  264  through  274  draw  and  label  the  broadband  and 
narrowband  limits. 


193 

194 
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196 

197 
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199 

200 
201 
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203 

204 

205 

206 

207 

208 

209 

210 
211 
212 

213 
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216 

217 

218 

219 

220 
221 
222 

223 

224 

225 

226 

227 

228 

229 

230 

231 

232 

233 

234 


"arat"  : 

"draws  the?  log  graph  on  the  plotter'*: 
c  s  i  z  1 , 2 ,  t  ,  0 
pen  I  1 
0+Z 

"nbloop "  : 

pit  “10  0  tZ ,  -60  ,  -2 

ip  1 1  0 , 240  ;  ipl  t  1200,0; ipl t  0,-240;ipll  -1200,0 
pen 

pit  0+7 , -40 , -2 
for  1=1 , 4e4  to  le9 

loq<I)+D;2. 06021 091 5e2*(D-4 . 1  461 28036) -HI 
pit  H+Z,-40  jplt  H+Z ,160, -1 
I+tntint <D)  +  I 

load) +D;  2.06021 0915e2*(D~4 ,146128036) +H 
pit  H+Z , 1 60 ; p 1 t  H+Z, -40,1 
I+tntint (D)+I 
nex  t  I 

for  I=-40  to  160  by  40 

iplt  --1000,0  ,2 

iplt  0,20,1 

if  I=160;qto  +3 

iplt  1000,0,2 

iplt  0,20,1 

pen 

nex  t  I 

if  Z=1 200  •.  0+7. ;  g  t  o  +3 
1200+Z 

gto  "nbloop" 

pit  0 , 165 ; lbl  "RADIATED  EMISSIONS  (RE02  1 4kHz-l . OaHz )  BD  DATA" 
pit  1200 , 165  ;  lbl  "RADIATED  EMISSIONS  (REU2.1  1 4kH t-1 . OgHt >  Nl<  DATA" 
cs»i 7.  1  ,2 , 1  ,90 

pit  1025,-20;lbl  "DB uV/m/MUz" 
pit  2220  ,--20  ;  lbl  "DBuV/m" 
csiz  1 ,2, 1  ,0 
pit  ~50 , 160 ; lbl  "160" 

Pit  -50 , 140 ; lbl  "140" 
p)t  -50 , 1 20  ;  lbl  "120" 
pit  -50, 100; lbl  "100" 
p)t  -35,80 ;lbl  "80" 
pit  -35,60  i  lbl  "60" 
pit  ~35,40;  lbl  "40" 
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235: 
236: 
23?: 
238 : 
23? : 

240  ; 

241  : 
242: 
243: 
244: 
245: 
246: 
247: 
248: 
249: 
250: 
251  : 
252: 
253 : 
254: 
255: 
256: 
257: 
258: 
259: 
260: 
261  : 
262: 
263: 
264: 
265: 
266: 
267: 
268: 
269: 
270: 
271  : 
272: 
273: 
274: 
275: 
27A- 


pit 

-35.20ti.bl 

2.0  " 

pit 

-  20 , 0  t  i  hi.  "0 

tl 

P  it 

-50, -20; lbl 

"  -  2  0  " 

nit 

-50  ,-  40  tlbl 

"  -40" 

pit 

-20 ,  45:  Lb  1 

".01" 

pit 

170  ,  45 tlbl 

<i  II 

pit 

380 ,  -45 j lb  1 

II  II 

pit 

580 ,-45 tlbl 

"10" 

|>  1 1 

780, -45 ; lb l 

”10  0  " 

p  1 1 

980 ,-45 tlbl 

"1000" 

pit 

300, -50} lb l 

"FREQUENCY  IN  MEGA  Hi  JR  7  2  " 

Pit 

1 150,160 ;lbl 

"10  0" 

pit 

11 50, 140  t  lbl. 

"140" 

pit 

1 150 , 120  t lb 1 

"120" 

pit 

1150, 100 tlbl 

"  1  0  0  " 

pit 

1165. 80 tlbl 

"80  " 

pit 

1 165 , 60 ; lbl 

"60" 

pit 

1 1 65 ,  40 ; lbl 

"40" 

pit 

1 1 65 , 20  j lbl 

"20" 

pit 

11 80,0; lbl  " 

0" 

pit 

1150, -20 ; lbl 

"  -20" 

Pit 

1150,-40 jlbl 

•■-40" 

pit 

1180,  -45;lbl 

".01" 

pit 

1 370 , -45 ; lbl 

II  |  II 

pit 

1580,  -45; lbl 

1 

pit 

1780  ,-45;lbl 

"10" 

Pit 

1980 , -45; lbl 

"100" 

Pit 

2180 ,-45 ;lbl 

"1000” 

pit 

1500 , -50 ; lbl 

"FREQUENCY  IN  MEGAHERTZ 

plot  the  spec  liMits": 


pit 

0,100,-2 

pit 

856,55 

Pit 

1000  ,70  ,-1 

pit 

1200  ,34,-2 

pit 

1870,20 

pit 

2200,45,-1 

Pit 

1 01 0 ,72 ; lbl 

"BEf" 

pit 

1 01 0 ,67 ; lbl 

"LIMIT 

Pit 

221 0 , 47; lbl 

”NB” 

pit 

ret 

221 0 ,42;lbl 

"LIMIT 

E.  TITLE1  and  TITLE-OUT 

TITLE1  inputs  an  array  of  string  variables  which  serves  as  a  graph 
data  identification  block.  The  input  format  is  eight  string  variables,  each 
64  characters  long.  TITLE-OUT  simply  prints  the  strings  input  in  TITLE1  on 
the  line  printer. 
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143:  “TITLE1 " : 

144:  "INPUT  THE  DOCUMENTATION  INFORMATION  TO  EE  PLACED  ON  THE  PLOTS": 
143:  ent  "SYSTEM  NAME?  ",  f*  :  "SYSTEM  NAME  :  "*<T*>D*  l  1  ]  j  *  ft 
146:  ent  "TEST  DATE? ", T* > "TEST  DATE:  "&T*->D*  [  21  ;  "  "4T$ 

147;  "HICOM/DRSMI  RTR “ >Dt ( 31 

148:  ent  "YOUR  NAME?  "  ,TT-  •>  "NAME  :  "6T$-»P*t  4 1  ;  "  "  >T$ 

149;  ent  "TEST  NUMBER?" ,T$  : "TEST  NUMBER:  "4T**D*t5] ; >T* 

150:  ent  "MODE? ", T$ ; "MODE :  "&T$-*D$  161;"  "  >Tt 

151:  ent  "POLARIZATION? “ , T*j "POLARIZATION :  "&Tt  " >Tt 

152 :  ent  "TEST  CONFIGURATION?  "  ,T$  :  "TEST  CONf  IGURATION  :  "&T*-»D*[RJ  t  ""-»T* 

153:  ret 

154: 

277:  "title-out": 

270:  "outputs  the  annotation  strinps  entered  bv  the  operator": 

279:  wrt  "p tr " , char < 1 0 > 6char ( 1 3) 

280:  wrt  "ptr  "  ,char  <27>6"n" 

281 :  for  1=1  to  8 
282:  wrt  "ptr",P$m 
283:  next  I 

284:  wrt  "p tr " , char <27 > 6" o  " 

205:  ret 
286: 

F.  ANT 

There  are  two  objectives  for  this  subroutine.  The  first  is  to  prompt 
the  user  of  the  program  to  pick  the  correct  antenna  for  the  frequency  band 
and  change  it  when  necessary.  The  second  is  to  call  the  subroutine  which 
draws  the  instrumentation  configuration  on  the  spectrum  analyzer  display  screen. 

The  program  then  stops  and  waits  for  the  operator  to  verify  the  test  setup. 

87:  "ANT": 

88:  "ANT  PROMPTS  THE  USER  TO  PICK  THE  CORRECT  ANTENNA  FOR  THE  BAND": 

89  :  if  rl  -1  jq  t  o  (3 

90:  if  rl=5jgto  +5 

91:  if  r 1=6:  qto  ••■6 

92:  if  rl>l  and  rl<5;ret 

93:  dsp  "ATTACH  EMCO  3301  TO  INPUT  1" 

94:  qto  >4 

95:  dsp  “ATTACH  EMCO  3104  TO  INPUT  1" 

96:  qto  «-2 

97:  dsp  "ATTACH  EMCO  3101  TO  INPUT  1" 

98:  qsh  "DRAW" 

99:  beepjstp 
100:  ret 
101: 

G.  DRAW 

This  routine  consists  of  a  series  of  graphics  commands  written  to  the 
spectrum  analyzer  trace  C  memory.  As  a  result  of  these  commands,  a  suggested 
test  setup  is  drawn  on  the  screen  of  the  spectrum  analyzer. 
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162:  "DRAW": 

163:  wrt  "sa" , “TP" 

164:  wit  "sa-.-DTe- 

165:  wr  t  "sa  "  .  "A4  ,  B4  ,KSm  ,KSo  D2" 

1 66 :  wr  t  " s a "  .  "PUPA  350,500 “ 

167:  wr t  "sa “ , "PDPR  -30 0 , 0 , 0 , 30 0 , 300 , V , 0 ,  500 “ 

168:  wr t  "sa"  "PUPR  -250,25" 

169:  wr  t  "sa  -  >  "LP856BAP  " 

170:  wr  t  “r,a "  ,  “PUPA  300,525  PDrR  0  ,-1  00,1  00,0" 

171:  wr  t  "sa"  ,"PR  0 , 1  0 , 20 , 0 , 0  ,  -20  ,  20 . 0 , 0 , 1  0  " 

172:  wr  t  "pa " , "PUPR  20,10  PDPR  50.30  PUPR-50  ,  -  50  PDPR  50,  30" 

173:  wr t  "sa" , "PUPA  650,600  PDPR  300,0,0,-300,-  300,0,0,300  " 

174:  wrt  "5a " , "PUPR  50,-150  LDE.U.T.P" 

175:  wrt  "  sa  "  ,  "PUPR  -40  0,275  INAPPROPRIATE  ANTENNA8" 

176:  if  r  1-1  : wr t  "sa "  ,  “PIJPR  -300,  -50  LPATTACH  FMCO  3701  TO  INPUT  IP" 

177:  if  r  1=5}  wr-t  "sa " ,  "PUPR  -300,-50  LBATTACil  F.HUO  310  4  TO  INPUT  16" 

178:  if  r 1=6; wrt  "sa" , “PUrR  -300,-50  LD ATTACH  EMCO  3101  TO  INPUT  IP" 

179:  wrt  "sa" , "PUPR  -275,-10  PDPR -50 .-1 75" 

180;  wrt  "sa "  ,  "PUPA  350,175  LR1.0  METER  SPhCINGP'" 

181:  wrt  "sa " ,  "PUPR  -125,25  PDPR  100.200" 

182:  wrt  "sa","PUrA  0,400  LD  LEr"-  INPUTP  PDPR  125,125" 

183:  wrt  "sa " , "PUPA  200,900  LBRE02  INSTRUMENTATION  SETUP®" 

184:  ret 
185: 

H.  SETUP 

This  subroutine  sets  up  the  spectrum  analyzer  to  collect  the  data 
using  the  following  commands: 

IP  -  Run  the  spectrum  analyzer  instrument  preset  routine.  Set  all 
controls  and  functions  to  their  default  states. 

KSC  -  Set  the  display  units  to  dByV. 

AT0DB  -  Set  the  spectrum  analyzer  input  attenuation  to  0  db. 

II  -  Select  input  1.  The  HP8568A  has  two  signal  inputs.  Input  1 
is  selected  because  it  has  a  wider  bandwidth  (100  Hz  -  1.5  GHz)  than  input 
2  (100  KHz  -  1.5  GHz). 

40:  "SETUP": 

41:  "SETS  THE  856BA  REFERENCE  LEVEL": 

42:  wrt  "saB,"IP  KSC" 

43:  wrt  “sa ” , "ATCDB  Tt" 

44:  ret 
45: 

I.  FREQ 

This  subroutine  passes  the  start  and  stop  frequencies  for  the  band  to 
be  displayed  to  the  spectrum  analyzer.  The  parameters  passed  are  selected  based 
on  the  current  value  of  the  loop  counter  (rl). 


12 


46: 

“FREQ" : 

47  : 

"FREQ  SELECTS  TIIF 

FREQUENCY  SPAN  OF  THE  ANALYZER": 

48: 

J.f  r  1=1; wet 

"  s  a  "  , 

"FB. 100MZ  FA. 014MZ" jret 

49  ; 

if  r1-?:wrt 

"sa"  , 

"FBI ,0MZ  FA . 1M7" ;ret 

50  ; 

•if  rl=3:wrt 

"sa"  , 

"FBI  0. OMZ  FA1  . OMZ"  ;  ret 

51  : 

if  rl-4;wrt 

"sa"  . 

"FB20.0M7.  EA10  .  OMZ"  ;rel 

52: 

if  rl~5;wrt 

"sa",. 

"F8200.9MZ  FA20 . OMZ" ;rei 

53: 

if  rl~6iwrt 

"  sa  "  , 

"FBI  0  00 .0M7  FA200 . OMZ" ; ret 

54: 

boopjwrt  "lp 

" . "NUMBER  OF  VALID  BANDS  EXCEEDED  IN  FREQ"  t wr  t 

55: 

J.  BWP 


This  subroutine  passes  the  video  and  resolution  bandwidth  parameters 
to  the  spectrum  analyzer,  based  on  the  current  loop  counter  and  the  state  of 
the  BB/NB  mode  variable  (A$) . 

The  resolution  and  video  bandwidths  used  in  this  program  represent  an 
optimum  set  of  parameters  arrived  at  by  balancing  the  following  requirements: 

1)  The  noise  floor  of  the  instrumentation  system  is  required  to  be  at 
least  6  dB  below  the  M1L-STD  461  limits. 

2)  The  sweep  time  of  the  spectrum  analyzer  display  must  be  appropriate. 
Under  some  combinations  of  parameters,  the  sweep  times  may  be  as  long 
as  twenty-five  minutes;  much  too  long  to  run  repetative  tests. 

3)  The  difference  in  the  narrowband  and  broadband  measurement  resolution 
bandwidth  should  be  at  least  a  factor  of  ten  for  all  bands. 

4)  The  video  bandwidth  should  be  as  large  as  possible  during  the 
acquisition  of  broadband  data  in  order  to  allow  accurate  spectral 
representation  of  fast  transients  present.  For  narrowband  signals, 
it  was  determined  that  setting  the  resolution  and  video  bandwidths 
equal  produced  the  best  correlation  between  the  automated  system 
and  the  EMI  receivers  generally  used  to  run  this  test  manually. 

56:  "BWP": 

57:  “BWP  PASSES  THE  BANDWIDTH  PARAMETERS  TD  THE  8568A" : 

50:  if  A*="BB" sgto  +3 

59:  if  Af=»‘,NE<"  <jto  +10 

60:  "BROAD  BAND  PARAMETER  SETUP": 

61:  jf  r t~l :  wrt  "sa*. "RBI . 0K7 ,VB3 . 0H7" 

62:  if  r 1 -2 ; wr  t  "sa"  ,  "RBI 0 . 0K7. , V83 , 0M2" 

63:  if  rt=3;wrt  "sa " , "RBI  00 . 0K7 , VB3 . OMZ" 

64:  if  cl -4; wr  t  "sa " , "RBI 00 . 0KZ , VD3 . OMZ" 

65:  if  rl*5;wrt  "sa " , "RBI . OMZ , VB3 , OMZ" 

66:  if  rl“6;wrt  "sa"  ,  "RBI  .  0MZ.VB3 . 0HZ" 

67:  gto  +8 

68:  "NARROW  BAND  PARAMETER  SETUP": 

69:  if  rl=ljwrt  "sa  "  ,  "RB100 . 0117  ,VB1 00 . 0HZ" 

70:  if  r 1=2; wet  "sa" , "RB300HZ ,MB300H7” 

71:  if  rl-3:wrt  "sa " , "RB3KZ , VB3K7 " 

72:  if  rl~4  •.  wet  "sa  "  .  "RP3K7  .VB3KZ" 

73:  if  rl=5;wrt  "sa" , "RB3K7 ,  VB3KZ" 

74;  if  r  1  ~6 ; wr t  "sa " , "RBI 0KZ ,VB1 0K7" 

75:  ret 


;end 
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K.  SWEEP 


This  subroutine  triggers  the  spectrum  analyzer  sweep,  using  the  A 
trace  memory  (trace  B  is  blanked).  The  trace  is  cleared  and  the  max  hold 
(peak)  mode  is  set.  If  broadband  mode  is  set,  the  spectrum  analyzer  is  allowed 
to  sweep  continuously  for  approximately  twenty  seconds.  This  helps  to  pick  up 
transient  noise  with  a  low  duty  cycle. 

For  narrowband  measurements,  the  single  sweep  mode  is  set  and  the  sweep 
is  triggered.  At  the  end  of  the  sweep  for  both  modes,  the  trace  memory  is  set 
to  "view"  in  order  to  prevent  inadvertant  changes  in  displayed  data. 

77:  "SWEEP  "  : 

78:  "SWEEP  CAUSFS  THE  85680  TO  SWEEP  THE  POND  K  DISPLAY  Ii  "  : 

79:  wrt  "sa" , "HD  Al" 

00:  wrt  "sa","A2" 

81:  if  A*-"BB" j wait  20000;gto  +3 
82:  wrt  "sa" ."S?" 

83:  wrt  "sa","TS" 

84;  wrt  "sa" ,"A3" 

85:  ret 
86: 

L.  EEDRL 


The  sole  purpose  of  this  subroutine  is  to  read  the  current  reference 
level  from  the  spectrum  analyzer  and  store  it  in  variable  R  for  later  use. 


186: 

"REDRL" : 

187: 

"READ  THE 

8568A 

188: 

wrt  “sa". 

"RL  OA 

189: 

red  "sa"  , 

R 

190  : 

wrt  "sa", 

"HD" 

191  : 

ret 

192: 

M.  REDSA 

REDSA  is  the  subroutine  which  reads  the  raw  data  stored  in  the  spectrum 
analyzer  trace  memory  into  the  9825  controller  for  analysis. 

First  the  start  and  stop  frequencies  are  read  using  the  OA  (output  active 
function)  command.  The  start  frequency  is  stored  in  r2  and  the  stop  frequency 
is  stored  in  r3;  both  are  used  in  later  subroutines. 

The  trace  data  is  then  read  as  a  1000  element  array  of  vertical  points, 
with  the  element  number  representing  the  X  coordinate  and  the  vertical 
magnitude  representing  the  Y  coordinate.  The  displayed  magnitudes  range  from 
a  minimum  of  0  to  a  maximum  of  1040  in  screen  coordinates.  This  creates  a 
square  field  of  points,  each  side  of  which  is  1000  points  in  length,  which 
leads  to  the  Cartesian  coordinate  system  explained  above. 

The  FOR-NEXT  loop  contained  in  lines  113-116  is  the  portion  of  the  program 
which  transfers  the  raw  data  from  the  spectrum  analyzer  to  the  controller. 
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Line  115  is  of  particular  interest.  The  first  portion  of  the  line  divides  each 
element  of  the  raw  data  array  (L[l])  by  1000  and  multiplies  by  10  to  convert 
the  screen  magnitude  to  dB  referenced  to  the  lowest  line  on  the  screen  graticle. 
The  next  portion  of  line  115  (R-100)  establishes  the  reference  level  for  the  top 
line  of  the  graticle  (using  subroutine  REDRL)  and  translates  that  reference  level 
to  the  bottom  line  of  the  screen  graticle.  The  two  numbers  are  then  added, 
producing  an  absolute  reading  in  dBuV. 

At  this  point,  the  data  stored  in  L[I]  should  correlate  with  the  raw  data 
read  on  any  EMI  receiver,  if  the  bandwidths  are  the  same,  the  data-point 
frequencies  are  the  same,  and  the  instrument  tolerances  are  accounted  for. 

102:  "REDS A" : 

103:  "RFDSA  READS  THC  TRACE  DATA  FROM  TIIC  8568A": 

104:  "first  read  the  start  and  stop  frequencies": 

105:  TmI 

106:  wrt  "sa", "FA  0A" 

107:  red  "sa  "  ,  T  :  T-»r  2 
108:  wrt  "sa" .  "FB  OA" 

109:  red  "sa " ,T jT+r3 
110:  wrt  "sa " , "HD" 

111:  now  read  the  data  in  screen  (X,Y)  coordinates": 

112:  wrt  "sa "  ,  "01  TA" 

113:  for  1=1  to  1 001 
114:  red  "sa",LtIl 
115:  L.m/1000*100  +  <R-100)-U  III 
116:  next  I 
117:  ret 
118: 
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N.  CHOP 

This  subroutine  compensates  for  the  small  (22.5  K  byte)  memory  size 
of  the  HP9825.  The  9825  operating  system  uses  8  bytes  for  each  integer  or 
real  number  stored.  This  means  that  the  1000  element  array  containing  the 
raw  data  (L[*])  would  occupy  8  K  bytes  (about  40%)  of  the  available  memory. 
Subroutine  CHOP  alleviates  this  problem.  It  chops  the  1000  element  L[*]  to  a 
100  element  array,  using  the  following  algorithm: 

1)  The  1000  element  array  is  divided  into  100  sectors  of  10  elements 
each. 

2)  The  maximum  value  over  the  ten  element  sector  is  retained  and 


the  other  points 

are 

discarded. 

287: 

"chop" : 

288: 

for  1=11  to  1001 

hy 

10 

289: 

o->r 

290: 

for-  J=1  to  10 

291  : 

Max  <T  ,L  1 1  J 1  )  >T 

292: 

next  J 

293: 

T+Lt  <1-1 )/10I 

294 : 

next  I 

295 : 

ret 

296: 
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0.  SMOOTH 


This  subroutine,  called  for  broadband  data  only,  rejects  the  narrow- 
band  data  present  in  the  broadband  measurement.  This  is  accomplished  by  limiting 
the  changes  between  sampling  points  to  3  dB  or  less.  Any  changes  greater  than 
3  dB  are  smoothed  (or  averaged)  to  a  lower  level.  Lines  299  through  301  trans¬ 
fer  the  present  trace  data  to  another  array  for  manipulation.  Lines  302  through 
305  calculate  the  changes  in  dB  between  each  point.  Lines  306  through  308  check 
to  see  if  all  delta  values  are  less  than  3  dB.  If  so,  control  is  passed  to  line 
317,  and  the  smoothed  data  is  placed  back  in  array  L[*].  If  any  delta  value  is 
3  or  greater,  control  is  passed  to  the  smoothing  portion  of  the  program  (lines 
310-315).  The  actual  smoothing  is  done  by  lines  312  through  314,  based  on  the 
delta  values  as  follows. 

If  Kj.  >3  and  <  -3,  a  true  spike  is  indicated.  This  spike  is  removed 

by  replacing  it  with  the  average  of  the  points  on  either  side;  that  is: 

Q[I]  -  KLl-iJL+  KjlJ-lj 

If  Kj  >  3  only,  then  the  following  point  Q[I+1]  is  bigger  than  Q[I],  Q[I+1] 

will  then  be  replaced  by  the  smaller  value  plus  half  the  delta: 

Q[I+1]  -  Q[I]  +  K[I]/2  . 

If  K[I]  <  -3,  it  indicates  that  K[I+1]  is  much  less  than  K[I] .  In  this  case 
Q[I]  will  be  averaged  down: 

Q 1 1 1  -  Q[I]  +  K[I]/2  . 

After  the  averaging  process,  the  program  loops  back  to  line  302,  and  continues 
to  run  until  all  delta  values  are  less  than  3  dB. 

297:  "smooth": 

290:  "rejects  narrowband  noise  in  broadband  data": 

299:  for  1=1  to  100 
300:  Lm^QlIl 
301 :  next  I 

302:  "calculate  deltas"; 

303:  for  I«1  to  99 
304 : 

305:  next  I 

306:  for  1=1  to  99 

307:  if  abs(K 1 I ] ) >3 jqt  o  +3 

308:  next  1 

309:  qto  +8 

310:  for  1=1  to  99 

311 :  if  1*1  or  I=99jqto  +2 

312:  if  K[J1>3  and  K 1 1  +  1  3  <~3;  <01 1~1  H01I+1  1  )/2-»QlI  1  ;qto  +3 
313:  if  KCIJ>3;0m+Km/2-»QtI+lJ 
314:  if  K(Il<-3;0m+Km/2-»0m 
315:  next  I 

316:  qto  "calculate  deltas" 
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317:  for  1=1  to  100 

318:  om-»Lm 

319:  next  I 
320:  ret 

321  : 

P .  BCOR 

Subroutine  BCOR,  called  for  broadband  measurements  only,  corrects 
the  broadband  data  for  the  effects  of  the  impulse  bandwidth  of  the  receiver. 
Lines  324-326  read  the  spectrum  analyzer  resolution  bandwidth.  Line  327 
calculates  the  impulse  bandwidth  correction  factor: 

B  -  20  loe  Oi6 

Lines  328  through  330  add  B  to  the  data  array. 

322  '  11  BCOR  11 ! 

323:  " CORRECT  FOR  THE  856PA  BANDWIDTH  FACTORS”: 

324:  wrt  "isa’V'RB  0A“ 

320:  red  "m*.T 
326:  wrt  "sa'V’MD" 

327  :  20*1 og ( lt'6/T)-*!: 

328:  for  1=1  to  100 
329:  UIl+Btim 
330:  next  I 
331:  ret 
332: 

Q.  ANTCOR  and  ANTCORLIM 

These  subroutines  are  closely  related  and  will  be  considered  at  the 
same  time. 

ANTCOR  takes  the  data  array  output  from  CHOP  or  BCOR  and  corrects  for  the 
effects  of  the  antenna  factor.  The  corrected  data  is  then  plotted  on  the 
graph  generated  in  GRAT.  Due  to  the  complexity  of  ANTCOR,  it  will  be 
explained  in  detail.  Line  123  calculates  the  frequency  difference  between 
sampling  points  by  subtracting  the  start  frequency  (r2)  from  the  stop 
frequency  (r3)  and  dividing  by  the  number  of  points.  Line  127  calculates 
the  frequency  of  each  measurement  point  and  converts  to  an  integral  number 
of  megahertz.  Line  128  calls  ANTCORLIM  which  supplies  the  slope  and  inter¬ 
cept  to  generate  a  log-linear  function  used  to  approximate  the  frequency 
currently  contained  in  rl.  (The  approximation  will  be  explained  in  detail 
later).  Line  130  initializes  r6.  Line  131  calculates  the  antenna  correction 
factor.  Line  133  adds  the  antenna  factor  to  the  data.  Lines  135  and  136 
positions  the  pen  to  write  on  the  broadband  or  narrowband  plot,  based  on  the 
value  of  the  X  offset  variable,  Z.  Lines  137  and  138  actually  plot  the 
corrected  data  (each  datapoint  of  L[I]).  Line  137  is  necessary  to  plot  the 
first  point  in  each  range;  line  138  plots  all  others. 

ANTCORLIM  contains  a  set  of  variables  used  to  generate  a  linear  approxi¬ 
mation  to  the  antenna  factor.  These  variables  were  calculated  using  the 
following  procedure: 


I 


1 


i 

# 

i 

* 

* 

r 


¥ 
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1)  The  antenna  correction  factors  given  by  the  manufacturer  were 
plotted  on  semi-log  paper. 

2)  The  curve  on  the  log  chart  was  then  approximated  by  a  series  of 
straight  lines  over  frequency  intervals. 

3)  The  starting  and  stopping  frequencies  for  each  line  were  noted,  and 
the  slope  and  intercept  of  each  linear  segment  were  calculated  using 
the  following  relationships: 


_ r4  -  r2 _ 

log(r3)  -  log(rl) 


I  =  r2  -  S  log(rl) 


rl  =  interval  starring  frequency 


r2  =  starting  amplitude 
r3  =  stop  ti-viquen  y 
r4  *  stop  i '  tude 


S  •  slope 
I  ■  Intercept 


These  slopes  and  intercepts  then  enable  the  calculation  of  the  antenna  factor 
for  any  datapoint  if  the  frequency  is  known.  The  frequencies  were  calculated 
in  line  127  using  the  semilog  relationship: 


Y  *  m  log  x  +  b 


lidU:  "ANILUK": 

121:  "THIS  ROUTINE  CORRECTS  FOR  ANTENNA  FACTORS": 

122:  "calculate  th*  frequency  delta": 

123:  <r3-r2)/100-*r4 
124:  if  A4»"BB"jpent  2 
125:  if  A4*"NB";pen#  3 
126:  for  1*1  to  100 
127:  <r2+(I-l  )»r4)/lefc**r5 
128:  gsb  "ANTCORI.IM" 

129:  "now  generate  the  polynomial  approximation  to  the  antenna  factor" 
130:  0-»r6 

131:  S*log<r5*lr6)+A-»r6 

132:  "now  correct  the  datanoint " : 

133:  LII]+r6-»Lm 
134:  "and  plot  it": 

135:  if  A*»"BB"*,0-»Z 
136:  if  A$*"NB" j  1200-*Z 

137:  if  I*ljpJt  2.0620210915e2*Uon<r5*le£.)-4.146128036>+Z,Lm,-2;gto 

138:  pit  2, 062021 091 5e2#(log(r5*lo6)-1 , 1 461 28036 )+Z> ECU 

139:  next  1 

140:  pen 

141 :  ret 

142: 
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333 : 

"ANTCORLIM" 

J 

334  : 

3  f 

r5>=l . 4e 

-2  and  r5<~2e 

335  : 

3.  P 

r  5  >“-2e-2 

and  r5<4e--2j 

336 : 

if 

r5>=4e-  2 

and  r5<6e~2; 

337  ; 

IP 

r5>«6e- 2 

and  r  5  <  1  e  - 1  j 

338 : 

if 

r5>- 1 e~l 

and  r5<1.5e 

339: 

1.  P 

r 5 > " 1 .5* 

-1  and  r5<2e- 

340  : 

:i  f 

r5  >~2e~t 

and  r5<4*-l ; 

341  : 

iP 

r  5  >«4e--l 

and  r5<6e-lj 

342: 

if 

r5  >~6e-l 

and  r5<8.5o- 

343: 

if 

r5>~Q.5o 

-1  and  r5<le0 

1  6?0253?2e1  4S  ■>  -  8  . 497905766el 4A  tret 


1  i3. 9752 1 1  5 1 2e 0 4? : -  4 . 0576 0 575fce1  -»A j  r a t 


if  r  5  >  -  1  e  0  and  r5<  1 . 6o0  j  1  . 371  742229el  -*S  j- 8 . 980453376el 4A  ire  t 
if  r5>~1.6e0  and  r5< 2e0 j -1 . 051 8851 16el +S :5 . 9319J9Q65el 4A ; ret 


353: 
354: 
355: 
356: 
357: 
358: 
359: 
360: 
361  : 
362: 
363: 
364: 
365: 
366: 
367: 
368: 
369: 
370: 
371  : 
372: 
373: 
374: 
375: 
376 : 
377: 
378: 
*2391 


if  r5>~2e0  and  r  5<  4*0  ;  2 , 491 446071  el ->S }-  1 . 626867643e2-»A  :ret 
iP  r5>=4e0  and  r5<  6e0  ;  1 . 81 7259548ol  »3j  -1  .  1017524Jle2-»A  j  ret 
if  r5>=6e0  and  r5<8*0  t-1  .  76086301 1  el  -»B  *.  1  ,  243539582*?-* A  tret 
iP  r5>~8e0  and  r5<  lei  j  4 . 6434830?lel  -+S ;  -3 . 1774381 15-i2-»A ;  ret 
if  r-  5  >  ••  lei  and  r5<  1  .  5el  ;6 . 814648305e0-»S ; -  4 . 04025381 4el ->a  ;ret 
if  r 5>=1.5el  and  r5< 2el  j 7 . 445648184el  +8  j  -5 . 256629867*2*4 j  ret 
if  r5>~2el  and  r5<3el j-1 . 1357747174S j J ,929232528el 44jret 
iP  r5>“3el  and  r5<  4el  :2 .5625529c!  >S i --1  . 80V081637e2-»A) ret 
if  r5>~4el  and  r5<5el  *,-2 . 063770232eHS  :  1 . 70889051  lo2-*A  ;ret 
if  r5 >=5el  and  r5<6el j -3 . 409898347*1  >3; 2 . 745270509o2*A; ret 
if  r5>=6el  and  r5<7el  >-l  .  941 8406B7ol *S  j  1 . 603393056e?-»A  jret 
if  r5>*7el  and  r5<8el  jl  .  034626412*1  *Sj  -7 . 31 6745654el-»A  jret 
if  r5>=8el  and  r5<  9el  ;  1  . 93493?807el  ->S  j -1 . 459004941  *2-»A  \  ret 
if  r5  >=9el  and  r5<  le2  j  1  . 180134647e2-»S  ;-9 . 291  077175e2>A  ;  ret 
if  r5)=>le2  and  r5<  1  .  lc-2  j-2 . 657474373&1  aS  :2 . 27597949Be2-»A  jret 
if  r5>~l . Ie2  and  r5< 1 . 2e2 . 381673128el tS 1 .776196887e2 *A j ret 
if  r5>~l  .  2e2  and  r5< 1 . 3e2 i~2 . 8/66956534S }3 . 80413455Vol 4A jret 
if  r5 > "1 . 3e2  and  r5< 1 . 4o2 j -6 . 835549619el 4S • 5 , 693326239*24A j r e t 
if  r5>~l  .  4e2  and  r5<  1  .5e2 *,6 . 007364352e! 4S  j-4 . 76867591 7e2-+A  jret 
if  r5>*l  .  5e2  and  r5<  1 . 6e2  ;  4 , 6380991 84el  4f> }  -  -3 . 64915221  9e2  >A  j  r  e  t 
if  r5>=1.6*2  and  r  5<  1  .7e2  >6 . 456773725eH8 1 -5 . 141214634e2-»A  iret 
if  r5>  =  l  .7*2  and  r  5<  1  .  8e2  •>  2 . 8!  9899046el  >Q  ; -2 . 1 47?03506e2->A  1  re  t 
if  r5>  =  l  ,  8e2  and  r5<  1 . 9c*2  :-5 . 1 1  049401 9el  45  ;4 . 398852076e2-»A  wet 
if  r5>  =  l  .  9e2  and  r 3<2e2 j9 , 875?24846el  >S j  B . 008034835e24A jret 
if  r5>=2e2  and  r5<  3e2  ;-3 , 236957945el  as  :2 . 92700R499e2-»A  jrei 
if  r5>-3e2  and  r5< 4e2; -2 . 401 1 76834e0 >G j 3 . 86550671 Bel *A j re t 
if  r5>~4e?  and  r5<5e2 ;2 . 063770232c*! 48 1  . 595267534e2-»A j r et 
if  r5  >~5e2  and  r5<6e2 j 1 . 01 034025lel +S. 1-6 . 78891953/el *Aj ret 
if  r5>~6e2  and  r5<7e2  j2 . 5393301 28el->S : -  2 . 021  062394e24A ; re  1 
if  r  5>*>7e2  and  r5<8e2j3, 621 19244el4Sj  -2 , 97798021 7e24A;  ret 
if  r5>-Be2  and  r5<9e2j9 .  774689033e04S  j- 6 .  242493605el->A  ;ret 
if  r5> -9e2  and  r5<«lei )8 . 741758127*048  •  -5 . 31  756431 4el  >A;  ret 


if  r5>~3el  and  r? 
if  r-5>~4el  and  r? 
if  r5>=5el  and  rf 
if  r5>=6el  and  rl 
if  r5>»7el  and  r? 
if  r5>=8el  and  r! 
if  r5>=9el  and  r': 
if  r5)=sle2  and  r! 
if  r5>~l . Ie2  and 
if  r5>~l . 2e2  and 
if  r5> -1 . 3e2  and 
if  r5>-l . 4e2  and 
if  r5>*l . 5e2  and 
if  r5>  =  l . 6e2  and 
if  r5>=l .7*2  and 
if  r5>=l . 8e2  and 
if  r5>=l . 9e2  and 
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APPENDIX  B. 


PROGRAM  TO  CALCULATE  SEMILOG  SLOPES  AND  INTERCEPTS. 


«;  fnt 

t:  r«t  !>2x,tll>12z>ill,ftii1l,llx,i-ll 
2:  fnt  n)el6.12,5*,eU.12,3x,*H.12,jx,et-,..12 
3:  vrt  6.1  ,-CTART  FttQVST*  FREQ* , ’CLOU* , 'INTERCEPT* 
«it  -START  FREQUENCY  IK  H2V1 
5:  ent  'AMPLITUDE  AT  START  FRfcQ*,r2 
6:  ait  "STOP  FREQUENCY  IN  NZ\r3 
?;  ent  MOP  AMPL1TUDEV4 
8:  'calc«laie  the  slepe': 

9:  <r4-r2)/UM<r3H«q<rimS 
II:  'calculate  the  intercept*: 

11:  r2-S*la<j(rl)-*A 
12:  ert  8.2,r1,r3,->,A 
13:  r3+rljr4-*r2 
14:  qtt  h 
•23412 
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APPENDIX  C.  LIST  OF  PROGRAM  VARIABLE  ASSIGNMENTS. 


A  Intercept  value  used  in  linear  approximation  to  logrithmatic  function 
(with  slope  value  S) . 

B  Impulse  bandwidth  correction  factor. 

D  Temporary  storage  variable  u  ad  in  "grat." 

H  Temporary  storage  variable  used  in  "grat." 

I  Variable  used  as  for/next  loop  counter. 

J  Variable  used  as  for/next  loop  counter. 

R  Reference  level. 

T  Temporary  storage  register,  usually  used  to  store  information  read 
from  a  bus  instrument. 

S  Slope  value  used  in  linear  approximation  to  logrithmatic  function. 

Z  Offset  variable  for  plotting  routines.  Value  is  0  for  Broadband  and 

1200  for  Narrowband  measurements. 

ARRAYS 

K[*]  Point  to  point  changes  (delta  array)  produced  in  subroutine  "SMOOTH." 

L[*]  Primary  data  manipulation  array  used  to  contain  data  read  from 
spectrum  analyzer. 

Q[*]  Temporary  storage  array  used  to  contain  data  during  manipulation 

in  "SMOOTH." 

A$  Broadband/Narrowband  marker . 

D$  String  array  used  to  contain  run/test  ID  information  in  TITLE1  and 

title-out. 

T$  Temporary  storage  area  for  string  data, 

rl  Loop  counter  for  the  six  frequency  bands. 

r2  Stop  frequency. 

r3  Start  frequency. 

r4  Frequency  change  between  points. 

r5  Frequency  of  each  point 

r6  Calculated  antenna  factor  for  each  point. 
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APPENDIX  D.  EQUIPMENT  LIST. 


Item  No. 

Quantity 

Description 

1 

1 

Spectrum  Analyzer  HP8568A 

2 

1 

Calculator,  HP9825A 

3 

1 

Plotter,  HP9872A 

4 

1 

Printer,  HP2631A  (opt) 

5 

1 

Printer,  HP9866B  (opt) 

6 

1 

Antenna,  Emco  3301 

7 

1 

Antenna,  Emco  3104 

8 

1 

Antenna,  Emco  3108 

9 

1 

Disk,  HP9885M  (opt) 
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APPENDIX  E.  WHY  DID  WE 


In  order  to  alleviate  reader  confusion  and  eliminate  unnecessary 
correspondence,  this  appendix  will  answer  some  of  the  most  frequently  asked 
questions  regarding  specific  programming  steps  contained  in  this  program. 

1.  Q  -  Why  did  we  specify  in  line  43  the  attenuation  to  be  used  by  the 
spectrum  analyzer? 

A  -  The  HP8568A  Spectrum  Analyzer  automatically  adjusts  the  input 
attenuation  to  maintain  an  optimum  output  level  from  the  first  mixer.  However, 
this  causes  a  resultant  change  in  the  noise  floor  and  shifting  in  the  CRT  trace 
level.  Since  the  data  trace  is  read  as  a  matrix  of  y-position  vs  x-position 
values,  this  automatic  attenuation  adjustment  would  create  inaccuracies  in 
corrected  data.  Therefore,  we  just  removed  all  attenuation  by  setting  0  dB 
attenuation. 

2.  Q  -  Why  did  we  use  output  format  01  (y-position  vs  x-position)  instead 
of  format  03  (output  in  dB)  in  line  112? 

A  -  A  bug  in  the  HP8568A  Spectrum  Analyzer  firmware  causes  the  HPIB  to 
hang  up  if  the  8568A  outputs  a  0  dB  datapoint  while  in  format  03,  requiring 
program  restart  and  consequent  loss  of  data. 

3.  Q  -  Why  do  we  use  multiple  scans  instead  of  one  long  slow  scan  to 
capture  broadband  data? 

A  -  A  bug  in  the  HP8568A  firmware  causes  a  noticeable  frequency 
inaccuracy  when  using  the  coupled  SWEEP  TIME  mode. 

4.  Q  -  Why  are  all  broadband  measurements  taken  using  the  3  mHz  video 
bandwidth  setting? 

A  -  In  order  to  pass  the  transients  associated  with  the  broadband 
noise,  it  is  necessary  to  have  the  video  bandwidth  as  wide  as  possible. 
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